home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / mac / Chapter Tutorials / DevGallery / ISYS / Source / MEMOREX1.DIR / 00042_NEXT.GIF.ls < prev    next >
Encoding:
Text File  |  1996-05-10  |  269 b   |  15 lines
  1. on mouseDown
  2.   puppetSound("Zap")
  3. end
  4.  
  5. on mouseUp
  6.   repeat while soundBusy(1)
  7.     go(the frame)
  8.   end repeat
  9.   set the visible of sprite 19 to 1
  10.   set the visible of sprite 20 to 1
  11.   set the visible of sprite 21 to 1
  12.   set the visible of sprite 18 to 1
  13.   go("Lab")
  14. end
  15.